(require 'lisp-mode)

;; ******** emacs lisp mode ********
(defun starsoul-emacs-lisp-mode-hook ()
  (setq tab-width 2)
  (setq indent-tabs-mode nil)
  (define-key emacs-lisp-mode-map [?\C-i] 'starsoul-tab)
  (define-key emacs-lisp-mode-map [?\C-j] 'electric-indent-just-newline)
                                                        ;;使用^C-j换行不自动缩进
  (define-key emacs-lisp-mode-map (kbd "<return>") 'newline)
                                                        ;;使用retrun换行自动缩进
  ;;(column-marker-2 100)
)
(add-hook 'emacs-lisp-mode-hook 'starsoul-emacs-lisp-mode-hook)


;; ******** lisp mode ********
(defun starsoul-lisp-mode-hook ()
  (setq tab-width 2)
  (setq indent-tabs-mode nil)
  (define-key lisp-mode-map [?\C-i] 'starsoul-tab)
  (define-key lisp-mode-map [?\C-j] 'electric-indent-just-newline)
                                                        ;;使用^C-j换行不自动缩进
  (define-key lisp-mode-map (kbd "<return>") 'newline)
                                                        ;;使用retrun换行自动缩进
  ;;(column-marker-2 100)
)
(add-hook 'lisp-mode-hook 'starsoul-lisp-mode-hook)

(provide 'init_lisp-mode)
